﻿Public Class B1ChildFormSetting
    Private _FileName As String
    Private _rectangleUID As String

    Public Sub New(ByVal filename As String, ByVal rectangleUID As String)
        _FileName = filename
        _rectangleUID = rectangleUID
    End Sub

    Public Property FileName As String
        Set(ByVal value As String)
            _FileName = value
        End Set
        Get
            Return SAPBoAddon.B1Addon.B1Addon.FolderForm & _FileName
        End Get
    End Property

    Public Property rectangleUID As String
        Set(ByVal value As String)
            _rectangleUID = value
        End Set
        Get
            Return _rectangleUID
        End Get
    End Property

    Public Overrides Function toString() As String
        Return _FileName.ToString()
    End Function
End Class
